clear all; close all; clc; 
R=220;
C=33e-12;
L=100e-6;
j=sqrt(-1); 
tau=R*C;
T = tau/100;
t = 0:T:(3*tau);
lt = length(t);
for k=2:lt; 
    K(k)=(1/j*k*C)/(R+j*k*L+1/(j*k*C));   
end
x=abs(K);
plot(t,x);
 
grid on
